home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 7 / BBS in a Box - Macintosh - Volume VII (BBS in a Box) (January 1993).iso / Files / Prog / T / Thinkcup.cpt / TCL Update / TCL Update Diffs / CPanorama.c.Diff < prev    next >
Encoding:
Text File  |  1990-02-27  |  5.0 KB  |  132 lines  |  [TEXT/MPS ]
  1. File #1: Roy G. Biv:C TCL patch ƒ:new files:CPanorama.c
  2. File #2: Roy G. Biv:C TCL patch ƒ:old files:CPanorama.c
  3.  
  4. Extra lines in 1st before 20 in 2nd (File "Roy G. Biv:C TCL patch ƒ:new files:CPanorama.c"; Line 20:24; File "Roy G. Biv:C TCL patch ƒ:old files:CPanorama.c"; Line Δ20)
  5.   20    /* Altered by TCL Weaver version 1.0 (2/21/90) */
  6.   21    
  7.   22    #include "Constants.h"      
  8.   23    #include "CWindow.h"
  9.   24    
  10.  
  11.  
  12. Nonmatching lines (File "Roy G. Biv:C TCL patch ƒ:new files:CPanorama.c"; Line 227:230; File "Roy G. Biv:C TCL patch ƒ:old files:CPanorama.c"; Line 222:223)
  13.  227        /* Altered by TCL Weaver version 1.0 (2/21/90) */
  14.  228        
  15.  229        hScale = Max(aHScale, 1);               
  16.  230        vScale = Max(aVScale, 1);
  17.  
  18.  222        hScale = aHScale;                   /* Set instance variables           */
  19.  223        vScale = aVScale;
  20.  
  21.  
  22. Nonmatching lines (File "Roy G. Biv:C TCL patch ƒ:new files:CPanorama.c"; Line 323:326; File "Roy G. Biv:C TCL patch ƒ:old files:CPanorama.c"; Line 316:317)
  23.  323        /* Altered by TCL Weaver version 1.0 (2/21/90) */
  24.  324        
  25.  325        position.h += delta->left / hScale; /* Scroll position is tied to the   */
  26.  326        position.v += delta->top / vScale;  /* left of the frame.               */
  27.  
  28.  316        hOrigin -= delta->left;             /* Origin moves with the top left   */
  29.  317        vOrigin -= delta->top;              /*   corner of the pane             */          
  30.  
  31.  
  32. Nonmatching lines (File "Roy G. Biv:C TCL patch ƒ:new files:CPanorama.c"; Line 345:348; File "Roy G. Biv:C TCL patch ƒ:old files:CPanorama.c"; Line 336)
  33.  345             
  34.  346             /* Altered by TCL Weaver version 1.0 (2/21/90) */
  35.  347             
  36.  348            void    Pane_EnclosureScrolled(
  37.  
  38.  336            static void Pane_EnclosureScrolled(
  39.  
  40.  
  41. Extra lines in 1st before 379 in 2nd (File "Roy G. Biv:C TCL patch ƒ:new files:CPanorama.c"; Line 391:392; File "Roy G. Biv:C TCL patch ƒ:old files:CPanorama.c"; Line Δ379)
  42.  391        /* Altered by TCL Weaver version 1.0 (2/21/90) */
  43.  392        
  44.  
  45.  
  46. Nonmatching lines (File "Roy G. Biv:C TCL patch ƒ:new files:CPanorama.c"; Line 395; File "Roy G. Biv:C TCL patch ƒ:old files:CPanorama.c"; Line 381:384)
  47.  395            ((CWindow *) (((WindowPeek) macPort)->refCon))->Update();
  48.  
  49.  381            BeginUpdate(macPort);
  50.  382            tempRect = (**macPort->visRgn).rgnBBox;
  51.  383            DrawAll(&tempRect);
  52.  384            EndUpdate(macPort);
  53.  
  54.  
  55. Nonmatching lines (File "Roy G. Biv:C TCL patch ƒ:new files:CPanorama.c"; Line 483:484; File "Roy G. Biv:C TCL patch ƒ:old files:CPanorama.c"; Line 472:473)
  56.  483            }
  57.  484            Prepare();      /* Altered by TCL Weaver version 1.0 (2/21/90) */
  58.  
  59.  472                Prepare();
  60.  473            }
  61.  
  62.  
  63. Nonmatching lines (File "Roy G. Biv:C TCL patch ƒ:new files:CPanorama.c"; Line 492:493; File "Roy G. Biv:C TCL patch ƒ:old files:CPanorama.c"; Line 481:482)
  64.  492    /* Altered by TCL Weaver version 1.0 (2/21/90) */
  65.  493    
  66.  
  67.  481    /**** P R I N T I N G   M E T H O D S ****/
  68.  482        
  69.  
  70.  
  71. Extra lines in 1st before 485 in 2nd (File "Roy G. Biv:C TCL patch ƒ:new files:CPanorama.c"; Line 496:552; File "Roy G. Biv:C TCL patch ƒ:old files:CPanorama.c"; Line Δ485)
  72.  496     DoKeyDown  (OVERRIDE)
  73.  497    
  74.  498            Implement Home, End, Page Up, and Page Down scrolling keys on
  75.  499            extended keyboards.
  76.  500     ******************************************************************************/
  77.  501     
  78.  502    void CPanorama::DoKeyDown(
  79.  503        char        theChar,
  80.  504        Byte        keyCode,
  81.  505        EventRecord *macEvent)
  82.  506    {
  83.  507        Point   thePosition;
  84.  508        long    theHExtent, theVExtent;
  85.  509        
  86.  510        switch (keyCode) {
  87.  511        
  88.  512            case KeyHome:
  89.  513                if (itsScrollPane != NULL) {
  90.  514                    GetHomePosition(&thePosition);
  91.  515                    ScrollTo(thePosition, TRUE);
  92.  516                }
  93.  517                break;
  94.  518                
  95.  519            case KeyEnd:
  96.  520                if (itsScrollPane != NULL) {
  97.  521                    GetExtent(&theHExtent, &theVExtent);
  98.  522                    thePosition.h = Max(0, theHExtent - itsScrollPane->hSpan);
  99.  523                    thePosition.v = Max(0, theVExtent - itsScrollPane->vSpan);
  100.  524                    ScrollTo(thePosition, TRUE);
  101.  525                }
  102.  526                break;
  103.  527                
  104.  528            case KeyPageUp:
  105.  529                if (itsScrollPane != NULL) {
  106.  530                    itsScrollPane->DoVertScroll(inPageUp);
  107.  531                    itsScrollPane->AdjustScrollMax();
  108.  532                }
  109.  533                break;
  110.  534                
  111.  535            case KeyPageDown:
  112.  536                if (itsScrollPane != NULL) {
  113.  537                    itsScrollPane->DoVertScroll(inPageDown);
  114.  538                    itsScrollPane->AdjustScrollMax();
  115.  539                }
  116.  540                break;
  117.  541                
  118.  542            default:
  119.  543                inherited::DoKeyDown(theChar, keyCode, macEvent);
  120.  544                break;
  121.  545        }
  122.  546    }
  123.  547    
  124.  548            
  125.  549    /**** P R I N T I N G   M E T H O D S ****/
  126.  550        
  127.  551    
  128.  552    /******************************************************************************
  129.  
  130.  
  131. *** EOF on both files at the same time ***
  132.